<script>on mouseUpput card fld "loops" into loopsput the heapSpace into cd fld "startHeap"repeat with i = 1 to loopsput dbVersion() into dbResultput the heapSpace into cd fld "endHeap"put "Testing loop" && i && "of" && loops & "..." into cd fld "status"end repeatif cd fld "endHeap" < cd fld "startHeap" thenput "Used" && cd fld "startHeap" - cd fld "endHeap" && "bytes." into cd fld "status"elseif cd fld "endHeap" = cd fld "startHeap" thenput "Heap remained the same." into cd fld "status"elseput "Gained" && cd fld "endHeap" - cd fld "startHeap" && "bytes." into cd fld "status"end ifend ifend mouseUp</script>
</part>
<part>
<id>6</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>121</left>
<top>122</top>
<right>219</right>
<bottom>144</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBListFields</name>
<script>on mouseUpput card fld "loops" into loopsput the heapSpace into cd fld "startHeap"repeat with i = 1 to loopsput dbListFields() into dbResultput the heapSpace into cd fld "endHeap"put "Testing loop" && i && "of" && loops & "..." into cd fld "status"end repeatif cd fld "endHeap" < cd fld "startHeap" thenput "Used" && cd fld "startHeap" - cd fld "endHeap" && "bytes." into cd fld "status"elseif cd fld "endHeap" = cd fld "startHeap" thenput "Heap remained the same." into cd fld "status"elseput "Gained" && cd fld "endHeap" - cd fld "startHeap" && "bytes." into cd fld "status"end ifend ifend mouseUp</script>
</part>
<part>
<id>7</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>18</left>
<top>148</top>
<right>116</right>
<bottom>170</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBSelect</name>
<script>on mouseUpanswer "Do you have an open database?" with "Cancel" or "OK"if it is "Cancel" then exit mouseUpput card fld "loops" into loopsput the heapSpace into cd fld "startHeap"repeat with i = 1 to loopsput dbSelect(1) into dbResultput the heapSpace into cd fld "endHeap"put "Testing loop" && i && "of" && loops & "..." into cd fld "status"end repeatif cd fld "endHeap" < cd fld "startHeap" thenput "Used" && cd fld "startHeap" - cd fld "endHeap" && "bytes." into cd fld "status"elseif cd fld "endHeap" = cd fld "startHeap" thenput "Heap remained the same." into cd fld "status"elseput "Gained" && cd fld "endHeap" - cd fld "startHeap" && "bytes." into cd fld "status"end ifend ifend mouseUp</script>
</part>
<part>
<id>8</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>121</left>
<top>148</top>
<right>278</right>
<bottom>170</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBTop/Bottom/Go/Count</name>
<script>on mouseUpanswer "Do you have an open database?" with "Cancel" or "OK"if it is "Cancel" then exit mouseUpput card fld "loops" into loopsput the heapSpace into cd fld "startHeap"repeat with i = 1 to loopsput dbTop() into dbResultput dbBottom() into dbResultput dbCount() into theCountput dbGo(round(theCount/2)) into dbResultput the heapSpace into cd fld "endHeap"put "Testing loop" && i && "of" && loops & "..." into cd fld "status"end repeatif cd fld "endHeap" < cd fld "startHeap" thenput "Used" && cd fld "startHeap" - cd fld "endHeap" && "bytes." into cd fld "status"elseif cd fld "endHeap" = cd fld "startHeap" thenput "Heap remained the same." into cd fld "status"elseput "Gained" && cd fld "endHeap" - cd fld "startHeap" && "bytes." into cd fld "status"end ifend ifend mouseUp</script>
</part>
<part>
<id>9</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>18</left>
<top>174</top>
<right>219</right>
<bottom>196</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBGetCurrRecVal("L")</name>
<script>on mouseUpanswer "Do you have an open database?" with "Cancel" or "OK"if it is "Cancel" then exit mouseUpput card fld "loops" into loopsput the heapSpace into cd fld "startHeap"repeat with i = 1 to loopsput dbCount() into theCountput dbGo(round(theCount/2)) into dbResultput dbGetCurrRecVal("L") into dbResultput the heapSpace into cd fld "endHeap"put "Testing loop" && i && "of" && loops & "..." into cd fld "status"end repeatif cd fld "endHeap" < cd fld "startHeap" thenput "Used" && cd fld "startHeap" - cd fld "endHeap" && "bytes." into cd fld "status"elseif cd fld "endHeap" = cd fld "startHeap" thenput "Heap remained the same." into cd fld "status"elseput "Gained" && cd fld "endHeap" - cd fld "startHeap" && "bytes." into cd fld "status"end ifend ifend mouseUp</script>
</part>
<part>
<id>10</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>18</left>
<top>200</top>
<right>219</right>
<bottom>222</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBGetCurrRecVal("G")</name>
<script>on mouseUpanswer "Do you have an open database?" with "Cancel" or "OK"if it is "Cancel" then exit mouseUpput card fld "loops" into loopsput the heapSpace into cd fld "startHeap"repeat with i = 1 to loopsput dbCount() into theCountput dbGo(round(theCount/2)) into dbResultput dbGetCurrRecVal("G") into dbResultput the heapSpace into cd fld "endHeap"put "Testing loop" && i && "of" && loops & "..." into cd fld "status"end repeatif cd fld "endHeap" < cd fld "startHeap" thenput "Used" && cd fld "startHeap" - cd fld "endHeap" && "bytes." into cd fld "status"elseif cd fld "endHeap" = cd fld "startHeap" thenput "Heap remained the same." into cd fld "status"elseput "Gained" && cd fld "endHeap" - cd fld "startHeap" && "bytes." into cd fld "status"end ifend ifend mouseUp</script>
</part>
<part>
<id>11</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>18</left>
<top>226</top>
<right>219</right>
<bottom>248</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBGetCurrRecVal("C")</name>
<script>on mouseUpif it is "Cancel" then exit mouseUpput card fld "loops" into loopsput the short id of this card into returnCardgo to card id 5023put the heapSpace into stHeaprepeat with i = 1 to loopsput dbCount() into theCountput dbGo(round(theCount/2)) into dbResultput dbGetCurrRecVal("C") into dbResultput "Testing loop" && i && "of" && loops & "..."end repeatput the heapSpace into endHeapgo to card id returnCardput stHeap into cd fld "startHeap"put endHeap into cd fld "endHeap"put emptyhide msgif cd fld "endHeap" < cd fld "startHeap" thenput "Used" && cd fld "startHeap" - cd fld "endHeap" && "bytes." into cd fld "status"elseif cd fld "endHeap" = cd fld "startHeap" thenput "Heap remained the same." into cd fld "status"elseput "Gained" && cd fld "endHeap" - cd fld "startHeap" && "bytes." into cd fld "status"end ifend ifend mouseUp</script>
</part>
<content>
<layer>background</layer>
<id>1</id>
<text>Memory Usage Testing</text>
</content>
<content>
<layer>background</layer>
<id>2</id>
<text>These routines test calls to FileFlex to determine whether memory usage remains stable.A couple of things to keep in mind:1. You might want to consider compacting the stack (which is reputed to clean the heap) between calls, to make sure you're dealing with a clean environment.</text>
</content>
<content>
<layer>card</layer>
<id>1</id>
<text>500000</text>
</content>
<name></name>
<script>on openCardput empty into cd fld "status"put empty into cd fld "startHeap"put empty into cd fld "endHeap"end openCardon closeCardput empty into cd fld "status"put empty into cd fld "startHeap"put empty into cd fld "endHeap"end closeCard</script>
</card>
card_7190.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpglobal indexIDif cd fld "searchValue" is empty thenanswer "You must provide a search value first."exit mouseUpend ifput DBSeek(cd fld "SearchValue") into theResultgetTheRecordanswer "DBSeek returned" && theResult & "."end mouseUp</script>
</part>
<part>
<id>3</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>52</left>
<top>169</top>
<right>250</right>
<bottom>256</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>dbData</name>
<script></script>
</part>
<part>
<id>4</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>77</left>
<top>306</top>
<right>120</right>
<bottom>327</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBTop</name>
<script>on mouseUpput DBTop() into theResultif theResult ≠ 0 thenanswer "DBTop returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>5</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>121</left>
<top>306</top>
<right>149</right>
<bottom>327</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>29019</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Next</name>
<script>on mouseUpput dbSkip(-1) into theResultif theResult < 0 thenanswer "DBGo returned this error: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>6</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>150</left>
<top>306</top>
<right>177</right>
<bottom>327</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>2730</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Next</name>
<script>on mouseUpput dbSkip(1) into theResultif theResult = 3 thenbeepanswer "End of file."exit mouseUpend ifif theResult < 0 thenanswer "DBGo returned this error: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>7</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>178</left>
<top>306</top>
<right>238</right>
<bottom>327</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBBottom</name>
<script>on mouseUpput DBBottom() into theResultif theResult ≠ 0 thenanswer "DBBottom returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>13</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>51</left>
<top>87</top>
<right>251</right>
<bottom>103</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>SearchValue</name>
<script></script>
</part>
<content>
<layer>background</layer>
<id>1</id>
<text>DBSeek()</text>
</content>
<content>
<layer>background</layer>
<id>2</id>
<text>Use this to test DBSeek. Note that for the purpose of flexibility, the padstring functionality has not been implemented. As a result, while the index expression will move you to the right spot in the database, the result code will not indicate an exact match.</text>
</content>
<content>
<layer>card</layer>
<id>13</id>
<text>400000 </text>
</content>
<content>
<layer>card</layer>
<id>3</id>
<text>400000NKEY,C,400000DESCRIPT,C,400000 of 500000 (8:16:06 PM)</text>
</content>
<name></name>
<script>on getTheRecordput dbGetCurrRecVal() into cd fld "dbData"end getTheRecord</script>
</card>
card_8241.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpglobal indexIDif indexID is empty thenanswer "Please open an index file first."exit mouseUpend ifput DBCheckIndex(indexID) into theResultput "Check index result = " & theResult into cd fld "dbData"end mouseUp</script>
</part>
<part>
<id>3</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>52</left>
<top>169</top>
<right>252</right>
<bottom>256</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>dbData</name>
<script></script>
</part>
<content>
<layer>background</layer>
<id>1</id>
<text>DBCheckIndex()</text>
</content>
<content>
<layer>background</layer>
<id>2</id>
<text>Use this to confirm that the index file is valid.WARNING: If you've got a large index file, DBCheckIndex will take a looooong time.</text>
</content>
<content>
<layer>card</layer>
<id>3</id>
<text>Check index result = 0</text>
</content>
<name></name>
<script></script>
</card>
card_7908.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpglobal indexFileanswer file "Choose index file."if it is empty then exit mouseUpput it into cd fld "index file"put it into indexFileend mouseUp</script>
</part>
<part>
<id>2</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>52</left>
<top>131</top>
<right>252</right>
<bottom>216</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>index file</name>
<script></script>
</part>
<part>
<id>3</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>73</left>
<top>227</top>
<right>225</right>
<bottom>249</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>DBUseIndex</name>
<script>on mouseUpglobal indexIDif cd fld "index file" is empty thenanswer "Please choose an index file first."exit mouseUpend ifput dbUseIndex(cd fld "index file") into indexIDanswer "DBUseIndex returns '" & indexID & "'."end mouseUp</script>
</part>
<part>
<id>4</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>73</left>
<top>257</top>
<right>225</right>
<bottom>279</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>DBSelectIndex</name>
<script>on mouseUpglobal indexIDif indexID is empty thenanswer "Please DBUseIndex an index file first."exit mouseUpend ifput dbSelectIndex(indexID) into theResultanswer "DBSelectIndex returns '" & theResult & "'."end mouseUp</script>
</part>
<part>
<id>6</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>73</left>
<top>285</top>
<right>225</right>
<bottom>307</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>DBCloseIndex</name>
<script>on mouseUpglobal indexIDif indexID is empty thenanswer "Please DBUseIndex an index file first."exit mouseUpend ifput dbCloseIndex(indexID) into theResultanswer "DBCloseIndex returns '" & theResult & "'."end mouseUp</script>
</part>
<content>
<layer>background</layer>
<id>1</id>
<text>DBUseIndex(), DBSelectIndex()</text>
</content>
<content>
<layer>background</layer>
<id>2</id>
<text>Use this routine to find and open an index file. DBSelectIndex makes the specified ID current. DBCloseIndex closes the specified index file.</text>
</content>
<content>
<layer>card</layer>
<id>2</id>
<text>Glass House:Development Projects:FileFlex Project:FF 1.7 Development:Whopper Demo:for the radically insane:WHOPPER.NDX</text>
</content>
<name>dbuse</name>
<script></script>
</card>
card_6572.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpif cd fld "indexExpression" is empty thenanswer "Please enter an index expression first."exit mouseUpend ifask file "Name of index file:" with "TEST"if it is empty then exit mouseUpput it into fileSpecput DBCreateIndex(fileSpec,cd fld "indexExpression",0,0) into ¬theResultput "Create index result = " & theResult into cd fld "dbData"end mouseUp</script>
</part>
<part>
<id>3</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>52</left>
<top>169</top>
<right>252</right>
<bottom>256</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>dbData</name>
<script></script>
</part>
<content>
<layer>background</layer>
<id>1</id>
<text>DBCreateIndex()</text>
</content>
<content>
<layer>card</layer>
<id>1</id>
<text>UPPER(KEY)</text>
</content>
<content>
<layer>card</layer>
<id>3</id>
<text>Create index result = 1</text>
</content>
<content>
<layer>background</layer>
<id>2</id>
<text>Use this to create a named index file that you can then search and browse using DBSeek functions.</text>
</content>
<name></name>
<script></script>
</card>
card_5972.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpif cd fld "searchExpression" is empty thenanswer "Please enter a search expression first."exit mouseUpend ifput DBLocate(cd fld "searchExpression") into theResultif theResult ≠ 0 thenanswer "DBLocate returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>3</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>52</left>
<top>169</top>
<right>250</right>
<bottom>256</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>dbData</name>
<script></script>
</part>
<part>
<id>4</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>77</left>
<top>306</top>
<right>120</right>
<bottom>327</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBTop</name>
<script>on mouseUpput DBTop() into theResultif theResult ≠ 0 thenanswer "DBTop returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>5</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>121</left>
<top>306</top>
<right>149</right>
<bottom>327</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>29019</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Next</name>
<script>on mouseUpput dbSkip(-1) into theResultif theResult < 0 thenanswer "DBGo returned this error: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>6</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>150</left>
<top>306</top>
<right>177</right>
<bottom>327</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>2730</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Next</name>
<script>on mouseUpput dbSkip(1) into theResultif theResult = 3 thenbeepanswer "End of file."exit mouseUpend ifif theResult < 0 thenanswer "DBGo returned this error: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>7</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>178</left>
<top>306</top>
<right>238</right>
<bottom>327</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBBottom</name>
<script>on mouseUpput DBBottom() into theResultif theResult ≠ 0 thenanswer "DBBottom returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>8</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>73</left>
<top>266</top>
<right>232</right>
<bottom>288</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Reset DBLocate</name>
<script>on mouseUpput DBLocate("") into theResultget dbTop()getTheRecordend mouseUp</script>
</part>
<content>
<layer>background</layer>
<id>1</id>
<text>DBLocate()</text>
</content>
<content>
<layer>background</layer>
<id>2</id>
<text>Use this to test the DBLocate sequential searching capabilities of FileFlex. As your database gets larger, using DBLocate will become less and less practical.Remember to reset DBLocate before you leave this card or the results will be unpredictable.</text>
<script>on mouseUpif cd fld "memoname" is empty thenanswer "Please enter the name of the memo field first."exit mouseUpend ifif cd fld "findstring" is empty thenanswer "Please enter a search string first."exit mouseUpend if-- 0-found, 3-EOFput DBFindMemo(cd fld "memoname", cd fld "findstring") into theResultif theResult < 0 thenanswer "DBFindMemo returned error code: " & theResultexit mouseUpend ifif theResult is 3 thenanswer "DBFindMemo did not find your string."get dbTop()put DBGetMemo(cd fld "memoname") into cd fld "memo"exit mouseUpend ifput theResultput DBGetMemo(cd fld "memoname") into cd fld "memo"end mouseUp</script>
</part>
<part>
<id>3</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>52</left>
<top>169</top>
<right>252</right>
<bottom>256</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Memo</name>
<script></script>
</part>
<part>
<id>4</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>51</left>
<top>94</top>
<right>251</right>
<bottom>110</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>MemoName</name>
<script></script>
</part>
<part>
<id>7</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>51</left>
<top>125</top>
<right>251</right>
<bottom>141</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>findstring</name>
<script></script>
</part>
<part>
<id>8</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>194</left>
<top>62</top>
<right>252</right>
<bottom>84</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>DBTop</name>
<script>on mouseUpput DBTop() into theResultif theResult ≠ 0 thenanswer "DBTop returned error code: " & theResultexit mouseUpend ifif cd fld "memoname" is empty thenanswer "Please enter the name of the memo field first."exit mouseUpend ifput DBGetMemo(cd fld "memoname") into cd fld "memo"end mouseUp</script>
</part>
<part>
<id>10</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>19</left>
<top>197</top>
<right>48</right>
<bottom>226</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <false /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>15279</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>New Button</name>
<script>on mouseUpput dbcurrrecnum()+1 into nextrecif nextrec ≤ dbcount() thenget DBGo(nextrec)put DBGetMemo(cd fld "memoname") into cd fld "memo"elseanswer "at end of database"end ifend mouseUp</script>
</part>
<content>
<layer>background</layer>
<id>1</id>
<text>DBFindMemo()</text>
</content>
<content>
<layer>background</layer>
<id>2</id>
<text>First, enter the name of the memo field you'll be testing into the Memo Field Name field. Then enter a search string. Remember that DBFindMemo will search for a string...that means words or parts of words.Then click DBFindMemo() and tell the script to begin the search.The script will update the memo field contents back into the database.Warning: DBFindMemo bypasses the DBSkip mechanism for speed. That means it searches for data in physical record order. It also doesn't reset the pointer to the top of the database. So to move to the next record, do a:DBGo(DBCurrRecNum()+1)</text>
</content>
<content>
<layer>card</layer>
<id>4</id>
<text>DESCRIPT</text>
</content>
<content>
<layer>card</layer>
<id>7</id>
<text>ani</text>
</content>
<content>
<layer>card</layer>
<id>3</id>
<text>The life of the brilliant, eccentric composer, Amadeus Mozart, is told from the point of view of Mozart's long-time rival, Antonio Salieri (F. Murray Abraham). Tom Hulce portrays Mozart. Winner of 8 Academy Awards.</text>
</content>
<name></name>
<script></script>
</card>
card_2245.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpif cd fld "memoname" is empty thenanswer "Please enter the name of the memo field first."exit mouseUpend ifput DBWriteMemo(cd fld "memoname",cd fld "memo") into theResultanswer "DBWriteMemo returned : " & theResultend mouseUp</script>
</part>
<part>
<id>2</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>73</left>
<top>120</top>
<right>232</right>
<bottom>142</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>DBGetMemo</name>
<script>on mouseUpif cd fld "memoname" is empty thenanswer "Please enter the name of the memo field first."exit mouseUpend ifask "Go to which record?"if it is empty then exit mouseUpput DBGo(it) into theResultif theResult ≠ 0 thenanswer "DBGo returned error code: " & theResultexit mouseUpend ifput DBGetMemo(cd fld "memoname") into cd fld "memo"end mouseUp</script>
</part>
<part>
<id>3</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>52</left>
<top>169</top>
<right>252</right>
<bottom>256</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>Memo</name>
<script></script>
</part>
<part>
<id>4</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>51</left>
<top>87</top>
<right>251</right>
<bottom>103</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>MemoName</name>
<script></script>
</part>
<content>
<layer>background</layer>
<id>1</id>
<text>DBGetMemo(), DBWriteMemo()</text>
</content>
<content>
<layer>card</layer>
<id>4</id>
<text>DESCRIPT</text>
</content>
<content>
<layer>card</layer>
<id>3</id>
<text>The life of the brilliant, eccentric composer, Amadeus Mozart, is told from the point of view of Mozart's long-time rival, Antonio Salieri (F. Murray Abraham). Tom Hulce portrays Mozart. Winner of 8 Academy Awards.</text>
</content>
<content>
<layer>background</layer>
<id>2</id>
<text>First, enter the name of the memo field you'll be testing into the Memo Field Name field. Then click DBGetMemo() and tell the script which record you want to view.DBWriteMemo will update the memo field contents back into the database.Warning: It's probably best to make sure you don't switch records prior to writing the memo data back out. There's no error checking here.</text>
</content>
<name></name>
<script></script>
</card>
card_5575.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpput DBListFields() into theFieldsput line 1 of theFields into theCountdelete line 1 of theFieldsput 1 into thisField-- name the card fieldsrepeat with i = 1 to 22set cursor to busyif i <= theCount thenput item 1 of line thisField of theFields into theNameset the name of cd fld i to theNameput theName into cd fld (i+22)add 1 to thisFieldshow cd fld iput empty into cd fld ishow cd fld (i+22)show btn ("e" & i) -- encryption buttonselsehide cd fld ihide cd fld (i+22)hide btn ("e" & i) -- encryption buttonsend ifend repeatput DBTop() into theResultif theResult ≠ 0 thenanswer "DBTop returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>2</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>122</top>
<right>232</right>
<bottom>137</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>TITLE</name>
<script></script>
</part>
<part>
<id>3</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>138</top>
<right>232</right>
<bottom>153</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>DESCRIPT</name>
<script></script>
</part>
<part>
<id>4</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>154</top>
<right>232</right>
<bottom>169</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>RATING</name>
<script></script>
</part>
<part>
<id>5</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>170</top>
<right>232</right>
<bottom>185</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>TYPE</name>
<script></script>
</part>
<part>
<id>6</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>186</top>
<right>232</right>
<bottom>201</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>DATE_ARRIV</name>
<script></script>
</part>
<part>
<id>7</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>202</top>
<right>232</right>
<bottom>217</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>AVAILABLE</name>
<script></script>
</part>
<part>
<id>8</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>218</top>
<right>232</right>
<bottom>233</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>COST_RENT</name>
<script></script>
</part>
<part>
<id>9</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>234</top>
<right>232</right>
<bottom>249</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>COST_BUY</name>
<script></script>
</part>
<part>
<id>10</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>250</top>
<right>232</right>
<bottom>265</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>TIMES_RENT</name>
<script></script>
</part>
<part>
<id>11</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>266</top>
<right>232</right>
<bottom>281</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>NUM_SOLD</name>
<script></script>
</part>
<part>
<id>12</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>282</top>
<right>232</right>
<bottom>297</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>FORMAT</name>
<script></script>
</part>
<part>
<id>13</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>122</top>
<right>479</right>
<bottom>137</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>LENGTH</name>
<script></script>
</part>
<part>
<id>14</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>138</top>
<right>479</right>
<bottom>153</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>COUNTRY</name>
<script></script>
</part>
<part>
<id>15</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>154</top>
<right>479</right>
<bottom>169</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>ACODE</name>
<script></script>
</part>
<part>
<id>16</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>170</top>
<right>479</right>
<bottom>185</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>PHONE</name>
<script></script>
</part>
<part>
<id>17</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>186</top>
<right>479</right>
<bottom>201</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>FCODE</name>
<script></script>
</part>
<part>
<id>18</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>202</top>
<right>479</right>
<bottom>217</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>FAXPHONE</name>
<script></script>
</part>
<part>
<id>19</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>218</top>
<right>479</right>
<bottom>233</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>ALINK</name>
<script></script>
</part>
<part>
<id>20</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>234</top>
<right>479</right>
<bottom>249</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>DELETED</name>
<script></script>
</part>
<part>
<id>21</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>250</top>
<right>479</right>
<bottom>265</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script></script>
</part>
<part>
<id>22</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>266</top>
<right>479</right>
<bottom>281</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script></script>
</part>
<part>
<id>23</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>282</top>
<right>479</right>
<bottom>297</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script></script>
</part>
<part>
<id>24</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>122</top>
<right>71</right>
<bottom>137</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>25</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>138</top>
<right>71</right>
<bottom>153</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>26</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>154</top>
<right>71</right>
<bottom>169</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>27</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>170</top>
<right>71</right>
<bottom>185</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>28</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>186</top>
<right>71</right>
<bottom>201</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>29</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>202</top>
<right>71</right>
<bottom>217</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>30</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>218</top>
<right>71</right>
<bottom>233</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>31</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>234</top>
<right>71</right>
<bottom>249</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>32</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>250</top>
<right>71</right>
<bottom>265</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>33</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>266</top>
<right>71</right>
<bottom>281</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>34</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>282</top>
<right>71</right>
<bottom>297</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>35</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>122</top>
<right>318</right>
<bottom>137</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>36</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>138</top>
<right>318</right>
<bottom>153</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>37</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>154</top>
<right>318</right>
<bottom>169</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>38</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>170</top>
<right>318</right>
<bottom>185</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>39</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>186</top>
<right>318</right>
<bottom>201</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>40</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>202</top>
<right>318</right>
<bottom>217</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>41</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>218</top>
<right>318</right>
<bottom>233</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>42</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>234</top>
<right>318</right>
<bottom>249</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>43</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>250</top>
<right>318</right>
<bottom>265</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>44</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>266</top>
<right>318</right>
<bottom>281</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>45</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>282</top>
<right>318</right>
<bottom>297</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>46</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>77</left>
<top>306</top>
<right>120</right>
<bottom>327</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBTop</name>
<script>on mouseUpput DBTop() into theResultif theResult ≠ 0 thenanswer "DBTop returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>47</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>121</left>
<top>306</top>
<right>149</right>
<bottom>327</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>29019</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Next</name>
<script>on mouseUpput dbCurrRecNum() into theRecNumif theRecNum < 0 thenanswer "DBCurrRecNum returned this error: " & theRecNumexit mouseUpend ifif theRecNum = 1 thenanswer "Already at the top record."exit mouseUpend ifput dbGo(theRecNum - 1) into theResultif theResult < 0 thenanswer "DBGo returned this error: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>48</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>150</left>
<top>306</top>
<right>177</right>
<bottom>327</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>2730</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Next</name>
<script>on mouseUpput dbCurrRecNum() into theRecNumif theRecNum < 0 thenanswer "DBCurrRecNum returned this error: " & theRecNumexit mouseUpend ifif theRecNum = DBCount() thenanswer "Already at the bottom record."exit mouseUpend ifput dbGo(theRecNum + 1) into theResultif theResult < 0 thenanswer "DBGo returned this error: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>49</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>178</left>
<top>306</top>
<right>238</right>
<bottom>327</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBBottom</name>
<script>on mouseUpput DBBottom() into theResultif theResult ≠ 0 thenanswer "DBBottom returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>50</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>240</left>
<top>306</top>
<right>283</right>
<bottom>327</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBGo</name>
<script>on mouseUpask "Go to which record?"if it is empty then exit mouseUpput DBGo(it) into theResultif theResult ≠ 0 thenanswer "DBGo returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
<script>on mouseUpput DBCurrRecNum() into theRecanswer "Save record #" & theRec & "?" with "Cancel" or "Save"if it is "Cancel" then exit mouseUp-- this code builds the encryption listput empty into encryptListrepeat with i = 1 to 22put "e" & i into theBtnif the visible of btn theBtn is true thenif the hilight of btn theBtn is true thenif encryptList ≠ empty then put "," after encryptListput the short name of cd fld (i) after encryptListend ifend ifend repeatput DBWriteRec("CE",theRec,encryptList,cd fld "key") into dbResultanswer "DBWriteRec return code is" && dbResultgetTheRecordend mouseUp</script>
<text>Clicking on the field names attempts to sum or average the field contents. Use caution: no error checking is done for non-numeric fields. Also be aware that the Arrow buttons use DBGo for database navigation rather than DBSkip. This means that this card will not work in a predictable manner if either DBLocate or DBSeek is active.</text>
</content>
<content>
<layer>card</layer>
<id>79</id>
<text>xyz</text>
</content>
<content>
<layer>card</layer>
<id>2</id>
<text>AMADEUS</text>
</content>
<content>
<layer>card</layer>
<id>3</id>
<text>The life of the brilliant, eccentric composer, Amadeus Mozart, is told from the point of view of Mozart's long-time rival, Antonio Salieri (F. Murray Abraham). Tom Hulce portrays Mozart. Winner of 8 Academy Awards.</text>
</content>
<content>
<layer>card</layer>
<id>4</id>
<text>PG</text>
</content>
<content>
<layer>card</layer>
<id>5</id>
<text>Drama</text>
</content>
<content>
<layer>card</layer>
<id>6</id>
<text>19871225</text>
</content>
<content>
<layer>card</layer>
<id>7</id>
<text>F</text>
</content>
<content>
<layer>card</layer>
<id>8</id>
<text>22.47</text>
</content>
<content>
<layer>card</layer>
<id>9</id>
<text>1.00</text>
</content>
<content>
<layer>card</layer>
<id>10</id>
<text>142</text>
</content>
<content>
<layer>card</layer>
<id>11</id>
<text>125</text>
</content>
<content>
<layer>card</layer>
<id>12</id>
<text>1B</text>
</content>
<content>
<layer>card</layer>
<id>13</id>
<text>1</text>
</content>
<name></name>
<script>on openCardset the rect of fld "notes" to 296,69,496,108end openCardon closeCardset the rect of fld "notes" to 296,69,496,241end closeCardon getTheRecord-- this code builds the encryption listput empty into encryptListrepeat with i = 1 to 22put "e" & i into theBtnif the visible of btn theBtn is true thenif the hilight of btn theBtn is true thenif encryptList ≠ empty then put "," after encryptListput the short name of cd fld (i) after encryptListend ifend ifend repeatput dbGetCurrRecVal("CD",encryptList,cd fld "key") into dbResultif dbResult is empty then exit getTheRecordif dbResult < 0 thenanswer "DBGetCurrRecVal returned" && "[" & dbResult & "]"end ifend getTheRecord</script>
</card>
card_5023.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpput DBListFields() into theFieldsput line 1 of theFields into theCountdelete line 1 of theFieldsput 1 into thisField-- name the card fieldsrepeat with i = 1 to 22set cursor to busyif i <= theCount thenput item 1 of line thisField of theFields into theNameset the name of cd fld i to theNameput theName into cd fld (i+22)add 1 to thisFieldshow cd fld iput empty into cd fld ishow cd fld (i+22)elsehide cd fld ihide cd fld (i+22)end ifend repeatput DBTop() into theResultif theResult ≠ 0 thenanswer "DBTop returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>2</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>122</top>
<right>232</right>
<bottom>137</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>TITLE</name>
<script></script>
</part>
<part>
<id>3</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>138</top>
<right>232</right>
<bottom>153</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>DESCRIPT</name>
<script></script>
</part>
<part>
<id>4</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>154</top>
<right>232</right>
<bottom>169</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>RATING</name>
<script></script>
</part>
<part>
<id>5</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>170</top>
<right>232</right>
<bottom>185</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>TYPE</name>
<script></script>
</part>
<part>
<id>6</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>186</top>
<right>232</right>
<bottom>201</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>DATE_ARRIV</name>
<script></script>
</part>
<part>
<id>7</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>202</top>
<right>232</right>
<bottom>217</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>AVAILABLE</name>
<script></script>
</part>
<part>
<id>8</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>218</top>
<right>232</right>
<bottom>233</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>COST_RENT</name>
<script></script>
</part>
<part>
<id>9</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>234</top>
<right>232</right>
<bottom>249</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>COST_BUY</name>
<script></script>
</part>
<part>
<id>10</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>250</top>
<right>232</right>
<bottom>265</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>TIMES_RENT</name>
<script></script>
</part>
<part>
<id>11</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>266</top>
<right>232</right>
<bottom>281</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>NUM_SOLD</name>
<script></script>
</part>
<part>
<id>12</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>73</left>
<top>282</top>
<right>232</right>
<bottom>297</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>FORMAT</name>
<script></script>
</part>
<part>
<id>13</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>122</top>
<right>479</right>
<bottom>137</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>LENGTH</name>
<script></script>
</part>
<part>
<id>14</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>138</top>
<right>479</right>
<bottom>153</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>COUNTRY</name>
<script></script>
</part>
<part>
<id>15</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>154</top>
<right>479</right>
<bottom>169</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>ACODE</name>
<script></script>
</part>
<part>
<id>16</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>170</top>
<right>479</right>
<bottom>185</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>PHONE</name>
<script></script>
</part>
<part>
<id>17</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>186</top>
<right>479</right>
<bottom>201</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>FCODE</name>
<script></script>
</part>
<part>
<id>18</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>202</top>
<right>479</right>
<bottom>217</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>FAXPHONE</name>
<script></script>
</part>
<part>
<id>19</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>218</top>
<right>479</right>
<bottom>233</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>ALINK</name>
<script></script>
</part>
<part>
<id>20</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>234</top>
<right>479</right>
<bottom>249</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>DELETED</name>
<script></script>
</part>
<part>
<id>21</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>250</top>
<right>479</right>
<bottom>265</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script></script>
</part>
<part>
<id>22</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>266</top>
<right>479</right>
<bottom>281</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script></script>
</part>
<part>
<id>23</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>320</left>
<top>282</top>
<right>479</right>
<bottom>297</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script></script>
</part>
<part>
<id>24</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>122</top>
<right>71</right>
<bottom>137</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>25</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>138</top>
<right>71</right>
<bottom>153</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>26</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>154</top>
<right>71</right>
<bottom>169</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>27</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>170</top>
<right>71</right>
<bottom>185</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>28</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>186</top>
<right>71</right>
<bottom>201</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>29</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>202</top>
<right>71</right>
<bottom>217</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>30</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>218</top>
<right>71</right>
<bottom>233</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>31</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>234</top>
<right>71</right>
<bottom>249</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>32</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>250</top>
<right>71</right>
<bottom>265</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>33</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>266</top>
<right>71</right>
<bottom>281</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>34</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>7</left>
<top>282</top>
<right>71</right>
<bottom>297</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>35</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>122</top>
<right>318</right>
<bottom>137</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>36</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>138</top>
<right>318</right>
<bottom>153</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>37</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>154</top>
<right>318</right>
<bottom>169</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>38</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>170</top>
<right>318</right>
<bottom>185</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>39</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>186</top>
<right>318</right>
<bottom>201</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>40</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>202</top>
<right>318</right>
<bottom>217</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>41</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>218</top>
<right>318</right>
<bottom>233</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>42</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>234</top>
<right>318</right>
<bottom>249</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>43</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>250</top>
<right>318</right>
<bottom>265</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>44</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>266</top>
<right>318</right>
<bottom>281</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>45</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>254</left>
<top>282</top>
<right>318</right>
<bottom>297</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name></name>
<script>on mouseUpput me into fldNameanswer "Sum or average for" && fldName & "?" with "Sum" or "Average"¬or "Cancel"if it is "Cancel" then exit mouseUpif it is "Sum" thenanswer "Sum of field" && fldName && "is" && dbSum(fldName)elseanswer "Average of field" && fldName && "is" && dbAverage(fldName)end ifend mouseUp</script>
</part>
<part>
<id>46</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>77</left>
<top>306</top>
<right>120</right>
<bottom>327</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBTop</name>
<script>on mouseUpput DBTop() into theResultif theResult ≠ 0 thenanswer "DBTop returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>47</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>121</left>
<top>306</top>
<right>149</right>
<bottom>327</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>29019</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Next</name>
<script>on mouseUpput dbCurrRecNum() into theRecNumif theRecNum < 0 thenanswer "DBCurrRecNum returned this error: " & theRecNumexit mouseUpend ifif theRecNum = 1 thenanswer "Already at the top record."exit mouseUpend ifput dbGo(theRecNum - 1) into theResultif theResult < 0 thenanswer "DBGo returned this error: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>48</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>150</left>
<top>306</top>
<right>177</right>
<bottom>327</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>2730</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Next</name>
<script>on mouseUpput dbCurrRecNum() into theRecNumif theRecNum < 0 thenanswer "DBCurrRecNum returned this error: " & theRecNumexit mouseUpend ifif theRecNum = DBCount() thenanswer "Already at the bottom record."exit mouseUpend ifput dbGo(theRecNum + 1) into theResultif theResult < 0 thenanswer "DBGo returned this error: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>49</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>178</left>
<top>306</top>
<right>238</right>
<bottom>327</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBBottom</name>
<script>on mouseUpput DBBottom() into theResultif theResult ≠ 0 thenanswer "DBBottom returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>50</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>240</left>
<top>306</top>
<right>283</right>
<bottom>327</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<name>DBGo</name>
<script>on mouseUpask "Go to which record?"if it is empty then exit mouseUpput DBGo(it) into theResultif theResult ≠ 0 thenanswer "DBGo returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
<script>on mouseUpput DBCurrRecNum() into theRecanswer "Save record #" & theRec & "?" with "Cancel" or "Save"if it is "Cancel" then exit mouseUpput DBWriteRec("C",theRec) into theResultanswer "DBWriteRec return code is" && theResultgetTheRecordend mouseUp</script>
<text>Clicking on the field names attempts to sum or average the field contents. Use caution: no error checking is done for non-numeric fields. Also be aware that the Arrow buttons use DBGo for database navigation rather than DBSkip. This means that this card will not work in a predictable manner if either DBLocate or DBSeek is active.</text>
</content>
<content>
<layer>card</layer>
<id>2</id>
<text>AMADEUS</text>
</content>
<content>
<layer>card</layer>
<id>3</id>
<text>The life of the brilliant, eccentric composer, Amadeus Mozart, is told from the point of view of Mozart's long-time rival, Antonio Salieri (F. Murray Abraham). Tom Hulce portrays Mozart. Winner of 8 Academy Awards.</text>
</content>
<content>
<layer>card</layer>
<id>4</id>
<text>PG</text>
</content>
<content>
<layer>card</layer>
<id>5</id>
<text>Drama</text>
</content>
<content>
<layer>card</layer>
<id>6</id>
<text>19871225</text>
</content>
<content>
<layer>card</layer>
<id>7</id>
<text>F</text>
</content>
<content>
<layer>card</layer>
<id>8</id>
<text>22.47</text>
</content>
<content>
<layer>card</layer>
<id>9</id>
<text>1.00</text>
</content>
<content>
<layer>card</layer>
<id>10</id>
<text>142</text>
</content>
<content>
<layer>card</layer>
<id>11</id>
<text>125</text>
</content>
<content>
<layer>card</layer>
<id>12</id>
<text>1B</text>
</content>
<content>
<layer>card</layer>
<id>13</id>
<text>1</text>
</content>
<name></name>
<script>on openCardset the rect of fld "notes" to 296,69,496,108end openCardon closeCardset the rect of fld "notes" to 296,69,496,241end closeCardon getTheRecordget dbGetCurrRecVal("C")end getTheRecord</script>
</card>
card_4801.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpput DBTop() into theResultif theResult ≠ 0 thenanswer "DBTop returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>2</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>52</left>
<top>140</top>
<right>252</right>
<bottom>227</bottom>
</rect>
<style>scrolling</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>DBData</name>
<script></script>
</part>
<part>
<id>3</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>73</left>
<top>254</top>
<right>225</right>
<bottom>276</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>DBBottom</name>
<script>on mouseUpput DBBottom() into theResultif theResult ≠ 0 thenanswer "DBBottom returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>4</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>135</left>
<top>113</top>
<right>163</right>
<bottom>135</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>26020</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Next</name>
<script>on mouseUpput dbCurrRecNum() into theRecNumif theRecNum < 0 thenanswer "DBCurrRecNum returned this error: " & theRecNumexit mouseUpend ifif theRecNum = 1 thenanswer "Already at the top record."exit mouseUpend ifput dbGo(theRecNum - 1) into theResultif theResult < 0 thenanswer "DBGo returned this error: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>5</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>135</left>
<top>229</top>
<right>163</right>
<bottom>251</bottom>
</rect>
<style>transparent</style>
<showName> <false /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>15279</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>Next</name>
<script>on mouseUpput dbCurrRecNum() into theRecNumif theRecNum < 0 thenanswer "DBCurrRecNum returned this error: " & theRecNumexit mouseUpend ifif theRecNum = DBCount() thenanswer "Already at the bottom record."exit mouseUpend ifput dbGo(theRecNum + 1) into theResultif theResult < 0 thenanswer "DBGo returned this error: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>6</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>73</left>
<top>280</top>
<right>225</right>
<bottom>302</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>DBGo</name>
<script>on mouseUpask "Go to which record?"if it is empty then exit mouseUpput DBGo(it) into theResultif theResult ≠ 0 thenanswer "DBGo returned error code: " & theResultexit mouseUpend ifgetTheRecordend mouseUp</script>
</part>
<part>
<id>8</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>164</left>
<top>124</top>
<right>252</right>
<bottom>139</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>bold</textStyle>
<textHeight>12</textHeight>
<name>deleted</name>
<script></script>
</part>
<part>
<id>9</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>296</left>
<top>254</top>
<right>448</right>
<bottom>276</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>DBDeleteRecs</name>
<script>on mouseUpput dbCurrRecNum() into theRecput dbDeleteRecs(theRec,theRec)getTheRecordend mouseUp</script>
</part>
<part>
<id>10</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>296</left>
<top>279</top>
<right>448</right>
<bottom>301</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>DBRecallRecs</name>
<script>on mouseUpput dbCurrRecNum() into theRecput dbRecallRecs(theRec,theRec)getTheRecordend mouseUp</script>
</part>
<part>
<id>11</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>296</left>
<top>304</top>
<right>448</right>
<bottom>326</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>DBPack</name>
<script>on mouseUpanswer "Are you sure you want to permanently remove deleted records?"¬with "Yes" or "Cancel"if it is "Cancel" then exit mouseupput dbPack() into theResultanswer "DBPack returned" && theResult & "."get dbTop()getTheRecordend mouseUp</script>
</part>
<content>
<layer>background</layer>
<id>1</id>
<text>Browse the Database</text>
</content>
<content>
<layer>card</layer>
<id>2</id>
<text>1NKEY,C,1DESCRIPT,C,1 of 500000 (12:12:12 PM)</text>
</content>
<content>
<layer>background</layer>
<id>2</id>
<text>This card tests the following routines:DBTop()DBBottom()DBGo()DBCount()DBCurrRecNum()DBGetCurrRecVal()*DBDeleteRecs()DBRecordDeleted()DBRecallRecs()DBPack*Tests the logical container transfer parameters. Doesn't test the bulk field moves.</text>
</content>
<name></name>
<script>on getTheRecordput dbGetCurrRecVal() into cd fld "dbData"if dbRecordDeleted(dbCurrRecNum()) is "Y" thenput "DELETED" into cd fld "Deleted"elseput empty into cd fld "Deleted"end ifend getTheRecord</script>
</card>
card_4381.xml
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE card PUBLIC "-//Apple, Inc.//DTD card V 2.0//EN" "" >
<script>on mouseUpglobal dbFileanswer file "Choose database file."if it is empty then exit mouseUpput it into cd fld "dbFile"put it into dbFileend mouseUp</script>
</part>
<part>
<id>2</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>52</left>
<top>131</top>
<right>252</right>
<bottom>216</bottom>
</rect>
<style>rectangle</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Geneva</font>
<textSize>9</textSize>
<textStyle>plain</textStyle>
<textHeight>12</textHeight>
<name>dbFile</name>
<script></script>
</part>
<part>
<id>3</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>73</left>
<top>227</top>
<right>225</right>
<bottom>249</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>DBUse</name>
<script>on mouseUpglobal dbIDif cd fld "dbFile" is empty thenanswer "Please choose a database file first."exit mouseUpend ifput dbUse(cd fld "dbFile") into dbIDanswer "DBUse returns '" & dbID & "'."end mouseUp</script>
</part>
<part>
<id>4</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>73</left>
<top>257</top>
<right>225</right>
<bottom>279</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>DBSelect</name>
<script>on mouseUpglobal dbIDif dbID is empty thenanswer "Please DBUse a database file first."exit mouseUpend ifput dbSelect(dbID) into theResultanswer "DBSelect returns '" & theResult & "'."end mouseUp</script>
</part>
<part>
<id>5</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>73</left>
<top>287</top>
<right>225</right>
<bottom>309</bottom>
</rect>
<style>rectangle</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Chicago</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>DBCloseAll</name>
<script>on mouseUpput dbCloseAll() into xanswer "DBCloseAll returns '" & x & "'."end mouseUp</script>
</part>
<content>
<layer>background</layer>
<id>1</id>
<text>DBUse(), DBSelect()</text>
</content>
<content>
<layer>background</layer>
<id>2</id>
<text>Use this routine to find and open a database file. DBSelect makes the specified ID current. Since this testbed supports the use of only one database at a time, click the DBSelect button just to make sure an error code is not returned.DBCloseAll closes all the files. Don't click this if you intend to play with other functions in the test bench. But if you're tinkering with a lot of open files, you might want to use DBCloseAll to reset things to a more manageable number.</text>
<text>Click the buttons to determine if the database session can be successfully opened.</text>
</content>
<content>
<layer>card</layer>
<id>9</id>
<text><span class="style4">elcome to the FileFlex Test Bench.</span><span class="style3"> This stack was used to help test the individual FF features during development of the latest FileFlex version. You can also use it to try out features yourself. Be forwarned: there is often little error checking in the scripts within the stack. Before clicking on buttons, be sure to read the button scripts and the comments in the notes field. Certain buttons depend on certain other actions having been taken.This stack is unsupported. Use at your own risk.</span></text>